home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PicturePatience.dxr / scripts_6_waste cards.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.7 KB  |  58 lines
  1. property spriteNum
  2. global waste, mover, equal, currentselect, foundation, points
  3.  
  4. on beginSprite me
  5.   waste = new(script("card pile"))
  6.   sprite(spriteNum).member = member("block", "playing cards")
  7. end
  8.  
  9. on mouseDown me
  10.   if sprite(spriteNum).member <> member("block", "playing cards") then
  11.     puppetSound(3, "pickcard")
  12.     sprite(spriteNum).locZ = spriteNum + 1000
  13.     mover = timeout("mover").new(5, #moveme, me)
  14.     if waste.cards.count > 1 then
  15.       wasting = waste.cards
  16.       sprite(17).member = member(wasting[wasting.count - 1].membername, "playing cards")
  17.     end if
  18.   end if
  19. end
  20.  
  21. on moveme me
  22.   sprite(spriteNum).loc = the mouseLoc
  23. end
  24.  
  25. on mouseUp me
  26.   if sprite(spriteNum).member <> member("block", "playing cards") then
  27.     if equal = 1 then
  28.       puppetSound(3, "pickcard")
  29.       mover.forget()
  30.       sprite(spriteNum).loc = waste.getlastcard().location
  31.       sprite(spriteNum).locZ = spriteNum
  32.       sprite(currentselect).member = member(sprite(the clickOn).memberNum, "playing cards")
  33.       put waste.cards.count
  34.       waste.cards.deleteAt(waste.cards.count)
  35.       put waste.cards.count
  36.       if waste.cards.count > 0 then
  37.         sprite(spriteNum).member = member(waste.getlastcard().membername, "playing cards")
  38.       else
  39.         sprite(spriteNum).member = member("block", "playing cards")
  40.       end if
  41.       foundation[makesymbol(currentselect)].addCard(currentselect)
  42.       points = points + 10
  43.       equal = 0
  44.       currentselect = 0
  45.       checkwin()
  46.     else
  47.       if equal = 0 then
  48.         puppetSound(3, "dropcard")
  49.         if not voidp(mover) then
  50.           mover.forget()
  51.         end if
  52.         sprite(spriteNum).loc = waste.getlastcard().location
  53.         sprite(spriteNum).locZ = spriteNum
  54.       end if
  55.     end if
  56.   end if
  57. end
  58.